home *** CD-ROM | disk | FTP | other *** search
/ Introducing the New Way to Shop From Home / Introducing the New Way to Shop From Home (Iceland Foods) (2003).iso / pc / qtupdate.dxr / Internal_60.ls < prev    next >
Encoding:
Text File  |  2003-01-21  |  398 b   |  15 lines
  1. on exitFrame me
  2.   percent = string(sprite(14).duration / 100)
  3.   percentused = string(sprite(14).movieTime / percent)
  4.   if string(sprite(14).movieTime) < string(sprite(14).duration) then
  5.     sprite(12).width = 300 / 100 * percentused
  6.     go(the frame)
  7.   else
  8.     if string(sprite(14).movieTime) = string(sprite(14).duration) then
  9.       go(#next)
  10.     else
  11.       go(the frame)
  12.     end if
  13.   end if
  14. end
  15.